1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 | x = c(-2,0,2)y = c(-2,0,2)plot(x,y,type="n", axes=F,xlab="",ylab="")lines(c(0,2),c(0,2))lines(c(0,2),c(0,-2))lines(c(1,1),c(1,-1), lty="dotted")lines(c(0,1),c(1,1), lty="dotted")xx = c(0,1,1,0)yy = c(0,1,-1,0)polygon(xx, yy, col="red") arrows(-2,0,2,0)arrows(0,-2,0,2)text(-0.1,0,labels="O",pos=1)text(2,0,labels="x",pos=1)text(0,2,labels="y",pos=2)text(1.1,0,labels="1",pos=1)text(0,1,labels="1",pos=2) |
Hide Comments